home *** CD-ROM | disk | FTP | other *** search
/ TeX 1995 July / TeX CD-ROM July 1995 (Disc 1)(Walnut Creek)(1995).ISO / macros / latex209 / contrib / aguplus / aguplus.sty (.txt) < prev    next >
LaTeX Document  |  1994-08-21  |  31KB  |  764 lines
  1. %% This is file `aguplus.sty', generated 
  2. %% on <1994/6/6> with the docstrip utility (2.2e).
  3. %% (With manual patch on 1994/08/22, until true LaTeX2e version ready
  4. %% The original source files were:
  5. %% aguplus.dtx  (with options: `style,mtitle,209')
  6. %% sublabel.dtx  (with options: `package,subpack,209,agu')
  7. %% appendix.dtx  (with options: `package,subpack,209,agu,plates')
  8. %% figcaps.dtx  (with options: `package,subpack,agu,209,plates,sublab')
  9. %% natbib.dtx  (with options: `package,subpack,agu,209')
  10. %%  (with manual patch)
  11. %% balance.dtx  (with options: `package,subpack,209')
  12. %% --------------------------------- 
  13. %% AGU++ 
  14. %% --------------------------------- 
  15. %% An unofficial LaTeX extension to 
  16. %% the official AGU package AGUTeX 
  17. %% --------------------------------- 
  18. %% >>>>> Start of decommented files >>>>>>> 
  19. %%============================AGUPLUS.DTX===========================
  20. \def\filename{aguplus}
  21. %\def\fileversion{1.0a}
  22. %\def\filedate{1994/06/06}
  23. %% Manual patch in natbib part because this version originally made
  24. %% for preliminary test release of LaTeX2e. It does not work under true 2e
  25. %% so the patch has been added until a proper LaTeX2e version is ready
  26. \def\fileversion{1.0b}
  27. \def\filedate{1994/08/22}
  28.  %-------------------------------------------------------------------
  29.  % NOTICE:
  30.  % This file may be used for non-profit purposes.
  31.  % It may not be distributed in exchange for money,
  32.  %   other than distribution costs.
  33.  % The author provides it `as is' and does not guarantee it in any way.
  34. %% Copyright (C) 1994 Patrick W. Daly
  35.  % Max-Planck-Institut f\"ur Aeronomie
  36.  % Postfach 20
  37.  % D-37189 Katlenburg-Lindau
  38.  % Germany
  39.  % E-mail:
  40.  % SPAN--     nsp::linmpi::daly    (note nsp also known as ecd1)
  41.  % Internet-- daly@linax1.dnet.gwdg.de
  42.  %-----------------------------------------------------------
  43.  % This is AGU++, an extension to the AGU official package AGUTeX
  44.  % It fixes up some problems with AGUTeX, adds many extra features
  45.  %  including putting figures, plates, tables in the text,
  46.  %  decent author-year citations and BibTeX support,
  47.  %  \title, \author, \affil allowed in preamble,
  48.  %  supplemental abstract for JGR,
  49.  %  balanced columns on last preprint page,
  50.  %  sublabelling of counters figure, plate, table, equation.
  51.  %  This package MUST be used in conjunction with one of the AGUTeX
  52.  %    packages, and must follow it, as
  53.  %  \documentstyle[agupp,aguplus]{article}
  54.  %     or with the newer LaTeX2e
  55.  %  \documentclass{article}
  56.  %    \usepackage{agu2e,agupp,aguplus}
  57.  %  See the manual AGUPLUS.TEX for details.
  58.  %--------------------------------------------------------------------
  59. \typeout{Package: `\filename' v\fileversion\space <\filedate> --P.W.Daly}
  60. \newif\if@twoOnine \let\if@twoOnine=\if@compatibility
  61. \@ifundefined{documentclass}{
  62.     \@twoOninetrue
  63.     \NeedsTeXFormat{LaTeX2e}
  64.     \ProvidesPackage{\filename}[\filedate\space (PWD)]
  65. \newcommand{\optionlogo}{AGU$^{++}$}
  66. \@ifundefined{revtex@genre}{\@latexerr{Option `\filename' must
  67.   come before the AGU option}{\@ehd}\def\@tempa{\endinput}}
  68.   {\def\@tempa{\relax}}
  69. \@tempa
  70. \let\agupid=\revtex@pageid
  71. \let\@fv=\fileversion
  72. \def\revtex@pageid{\agupid
  73.     \@footnotetext{With the extension option `\optionlogo' v\@fv.}}
  74. \newif\if@draft
  75. \newif\if@preprint
  76. \newif\if@camera
  77. \def\@tempa{manuscript}
  78. \ifx\revtex@genre\@tempa\@drafttrue\else\@draftfalse\fi
  79. \def\@tempa{preprint}
  80. \ifx\revtex@genre\@tempa\@preprinttrue\else\@preprintfalse\fi
  81. \def\@tempa{galley}
  82. \ifx\revtex@genre\@tempa\@cameratrue\else\@camerafalse\fi
  83. \@ifundefined{reset@font}{\def\reset@font{\relax}}{}
  84. \@ifundefined{p@LaTeX}{}{\def\LaTeX{\protect\p@LaTeX}}
  85. \def\@sect#1#2#3#4#5#6[#7]#8{\ifnum #2>\c@secnumdepth
  86.      \def\@svsec{}\else
  87.      \refstepcounter{#1}
  88.      \edef\@svsec{\sectype\csname the#1\endcsname\sectchar\hskip 1ex }\fi
  89.      \@tempskipa #5\relax
  90.       \ifdim \@tempskipa>\z@
  91.         \begingroup #6\relax
  92.           \@hangfrom{\hskip #3\relax{\@svsec}}{\interlinepenalty \@M #8\par}
  93.         \endgroup
  94.        \csname #1mark\endcsname{#7}\addcontentsline
  95.          {toc}{#1}{\ifnum #2>\c@secnumdepth \else
  96.                       \protect\numberline{\csname the#1\endcsname}\fi
  97.                     #7}\else
  98.         \def\@svsechd{#6\hskip #3{\@svsec} #8\csname #1mark\endcsname
  99.                       {#7}\addcontentsline
  100.                            {toc}{#1}{\ifnum #2>\c@secnumdepth \else
  101.                              \protect\numberline{\csname the#1\endcsname}\fi
  102.                        #7}}\fi
  103.      \@xsect{#5}}
  104. \def\@ssect#1#2#3#4#5{\@tempskipa #3\relax
  105.    \ifdim \@tempskipa>\z@
  106.      \begingroup #4
  107.         \@hangfrom{\hskip #1}{\interlinepenalty \@M \sectype\ssectchar#5\par}
  108.      \endgroup
  109.    \else \def\@svsechd{#4\hskip #1\relax \sectype\ssectchar#5}\fi
  110.     \@xsect{#3}}
  111. \def\sectchar{.}  \def\ssectchar{} \def\sectype{}
  112. \def\@hangfrom#1{\noindent#1}
  113. \def\thesection{\@arabic{\c@section}}
  114. \def\thesubsection{\thesection.\@arabic{\c@subsection}}
  115. \def\thesubsubsection{\thesubsection.\@arabic{\c@subsubsection}}
  116. \def\theparagraph{\thesubsubsection.\@arabic{\c@paragraph}:}
  117. \def\sectionnumbers{\c@secnumdepth=3}
  118. \let\agureferences=\references
  119. \def\references{\noappendix\agureferences}
  120. \let\aguacknow=\acknowledgments
  121. \def\acknowledgments{\noappendix\aguacknow}
  122. \let\acknowledgements=\acknowledgments
  123. \if@preprint
  124. \newdimen\@fmwidth \@fmwidth=33pc
  125. \def\auth@skip{12pt}
  126. \def\affil@skip{5pt}
  127. \def\agutitle#1{\@makeslugcmmnt
  128. \hsize\@fmwidth
  129. \par\noindent
  130. \parbox{\@fmwidth}%
  131.   {\pretolerance=10000
  132.   \raggedright
  133.   \Large\bf#1}}
  134. \def\aguauthor#1{%
  135. \par\vskip\auth@skip\noindent
  136. \parbox{\@fmwidth}%
  137.   {\pretolerance=10000
  138.   \raggedright
  139.   \large#1}
  140. \gdef\auth@skip{12pt}}
  141. \def\aguaffil#1{\par\vskip\affil@skip\noindent
  142. \parbox{\@fmwidth}%
  143.   {\pretolerance=10000
  144.   \raggedright
  145.   \small#1}}
  146. \def\aguabs{\par\vspace{4ex}\noindent
  147. \minipage{\@fmwidth}\pretolerance=100
  148. \@rightskip=\z@ plus 2em\rightskip\@rightskip
  149. \large
  150. {\bf Abstract.}}
  151. \def\endaguabs{\endminipage\vspace{2ex}}
  152. \newbox\@abstract
  153. \setbox\@abstract\vbox{}
  154. \def\abstract{\global\setbox\@abstract\vbox\bgroup
  155.    \aguabs}
  156. \def\endabstract{\endaguabs\egroup}
  157. \def\xmaketitle{
  158.  \begingroup
  159.      \clearpage
  160.      \twocolumn[\box\@title
  161.          \box\@abstract
  162.          \null]
  163.          \global\@topnum\z@
  164.        \thispagestyle{plain}
  165.        \ifx\@titlenote\empty \else
  166.          \global\@botnum\z@
  167.          \long\def\@makefntext##1{##1}
  168.          \footnotetext{{\parindent=1em\indent
  169.              \let\@elt=\par\@titlenote}}
  170.        \fi
  171.   \endgroup
  172.  \pt@width=\hsize
  173.  \setcounter{footnote}{0}
  174.  \global\let\xmaketitle\relax}
  175. \let\agusection=\section
  176. \def\section{\pagestyle{myheadings}
  177. \if@twoside \markboth{\@versohead}{\@rectohead} \else
  178.   \markright{\@versohead: \@rectohead} \fi
  179. \xmaketitle\agusection}
  180. \long\def\@makecaption#1#2{%
  181.  \vskip 10\p@
  182.  \setbox\@tempboxa\hbox{#1 #2}%
  183.  \ifdim \wd\@tempboxa >\hsize
  184.      #1 #2\par
  185.    \else
  186.      \hbox to\hsize{\hfil\box\@tempboxa\hfil}%
  187.  \fi}
  188. \def\fps@figure{tbp}
  189. \def\fps@plate{tbp}
  190. \def\fps@table{tbp}
  191. \else
  192. \let\agutitle=\title
  193. \let\aguaffil=\affil
  194. \let\aguauthor=\author
  195. \def\xmaketitle{\par \hsize\wd\@title
  196. \begingroup
  197.  \box\@title
  198.        \ifx\@titlenote\empty \else
  199.          \global\@botnum\z@
  200.          \long\def\@makefntext##1{##1}
  201.          \footnotetext{{\parindent=10pt\indent
  202.              \parskip=6pt\let\@elt=\par\@titlenote}}
  203.        \fi
  204. \endgroup
  205.  \setcounter{footnote}{0}
  206.  \global\let\xmaketitle\relax}
  207. \let\aguabs=\abstract
  208. \def\abstract{\xmaketitle\aguabs}
  209. \let\aguendabs=\endabstract
  210. \def\endabstract{\aguendabs\par}
  211. \let\agusection=\section
  212. \def\section{\xmaketitle\par\agusection}
  213. \newbox\@title
  214. \setbox\@title=\vbox{}
  215. \def\title#1{\setbox\@title=\vbox{
  216.    \let\@nodocument=\relax
  217.    \agutitle{#1}}}
  218. \def\author#1{\setbox\@title=\vbox{\hsize=\wd\@title
  219.    \let\@nodocument=\relax
  220.    \box\@title \aguauthor{#1}}}
  221. \def\affil#1{\setbox\@title=\vbox{\hsize=\wd\@title
  222.    \let\@nodocument=\relax
  223.    \box\@title \aguaffil{#1}}}
  224. \def\altaffiltext#1#2{\let\@elt=\relax
  225.   \ifx\@titlenote\empty \def
  226.   \@titlenote{\altaffilmark{#1}#2} \else
  227.   \xdef\@titlenote{\@titlenote\@elt \altaffilmark{#1}#2}\fi}
  228. \def\@titlenote{}
  229. \let\maketitle=\xmaketitle
  230. \let\date=\slugcomment
  231. \newif\if@supabs \@supabsfalse
  232. \def\extraabstract{\global\@supabstrue}
  233. \if@camera
  234. \begingroup
  235.   \catcode `|=0 \catcode `[= 1
  236.   \catcode`]=2 \catcode `\{=12 \catcode `\}=12
  237.   \catcode`\^^M=13 \catcode`\\=12 %
  238. |long|gdef|@preabs#1\begin{abstract}[|endgroup|begin[abstract]]%
  239. |endgroup
  240. \long\def\supabs{\newpage \thispagestyle{empty}%
  241.   \hsize=20pc \reset@font\footnotesize
  242.   \hbox to \hsize{\hfil Paper number \@paperid}\par\vskip1em}
  243. \def\endsupabs{\par\endinput}
  244. \def\dosupabs{{\def\documentstyle{\begingroup\set@literal\@preabs}
  245. \let\abstract=\supabs\let\endabstract=\endsupabs
  246. \input{\jobname}}}
  247. \def\dosupabse{{\def\documentclass{\begingroup\set@literal\@preabs}
  248. \let\abstract=\supabs\let\endabstract=\endsupabs
  249. \input{\jobname}}}
  250. \if@twoOnine
  251.   \let\keependdoc=\enddocument
  252.   \def\enddocument{\if@supabs\dosupabs\fi\keependdoc}
  253. \else
  254.   \AtEndOfPackage{\AtEndDocument{\if@supabs\dosupabse\fi}}
  255. \def\iftwocol#1#2{\if@draft#2\else#1\fi}
  256. \def\afour{\textheight=24cm
  257.            \if@draft \textwidth=15cm \fi
  258.            \if@preprint \textwidth=17.3cm \columnsep=0.5cm
  259.               \oddsidemargin=-0.5cm \evensidemargin=-0.9cm \hoffset=0pt\fi}
  260. %%======================SUBLABEL.DTX========================================
  261. \def\filename{sublabel}
  262. \def\fileversion{4.3}
  263. \def\filedate{1994/05/16}
  264. %% Copyright (C) 1994 Patrick W. Daly
  265. \@ifundefined{iffigcaps}{}{\@@warning
  266.   {^^J ********************************^^J
  267.        `\filename' read in after `figcaps'^^J
  268.        There could be problems with sublabelled^^J
  269.        figure and table numbers.^^J
  270.        ********************************}}
  271. \def\substyle#1{\alph{#1}}
  272. \def\sublabon#1{\@bsphack
  273. \@ifundefined{c@#1}{\@latexerr{\string\sublabon\space called for a
  274.   non-existent counter}{\@eha}}{%
  275. \@ifundefined{c@sb@#1}{\expandafter\newcount\csname c@sb@#1\endcsname
  276.   \setcounter{sb@#1}{-1}}{}%
  277. \ifnum\@nameuse{c@sb@#1}<0\else\sublaboff{#1}\fi
  278. \stepcounter{#1}%
  279. \setcounter{sb@#1}{0}%
  280. \def\@tempa{eqnarray}\ifx \@tempa\@currenvir
  281.     \addtocounter{equation}{-1}\setcounter{sb@equation}{1}\fi
  282. \global\expandafter\let\csname @ldthe#1\expandafter\endcsname
  283.     \csname the#1\endcsname
  284. \expandafter\gdef\csname the#1\endcsname{%
  285.    \@nameuse{@ldthe#1}{\substyle{sb@#1}}}
  286. }\@esphack}
  287. \def\sublaboff#1{\@bsphack
  288. \@ifundefined{c@#1}{\@latexerr{\string\sublaboff\space called for a
  289.   non-existent counter}{\@eha}}{%
  290. \@ifundefined{c@sb@#1}{\@warning{\string\sublaboff{#1} called without
  291.   any previous^^J \string\sublabon{#1} command}}{%
  292. \ifnum\@nameuse{c@sb@#1}<0\@warning{\string\sublaboff{#1} called without
  293.   a previous^^J \string\sublabon{#1} command being active}\else
  294. \ifnum\@nameuse{c@sb@#1}=0\addtocounter{#1}{-1}\fi
  295. \setcounter{sb@#1}{-1}%
  296. \global\expandafter\let\csname the#1\expandafter\endcsname
  297.     \csname @ldthe#1\endcsname
  298. \def\@tempa{eqnarray}\ifx \@tempa\@currenvir
  299.     \stepcounter{equation}\fi
  300. \fi}}\@esphack}
  301. \if@twoOnine
  302. \@ifundefined{selectfont}{}{%
  303. \def\@setref#1#2#3{%
  304.   \ifx#1\relax {\reset@font\bf ??}%
  305.    \@warning{Reference `#3' on page \thepage \space undefined}%
  306.   \else
  307.    \expandafter#2#1\null
  308.   \fi}
  309. \def\ref#1{\expandafter\@setref\csname r@#1\endcsname\@firstoftwo{#1}}
  310. \def\pageref#1{\expandafter\@setref\csname r@#1\endcsname
  311.      \@secondoftwo{#1}}
  312. \def\@firstoftwo#1#2{#1}
  313. \def\@secondoftwo#1#2{#2}
  314. \@ifundefined{reset@font}{\def\reset@font{\relax}}{}
  315. \let\@ldstepcounter=\stepcounter
  316. \def\stepcounter#1{%
  317. \@ifundefined{c@sb@#1}{\@ldstepcounter{#1}}{\ifnum
  318.   \@nameuse{c@sb@#1}<0\relax
  319.   \@ldstepcounter{#1}\else \@ldstepcounter{sb@#1}\fi}%
  320. \let\@ldaddtoctr=\addtocounter
  321. \def\addtocounter#1#2{%
  322. \@ifundefined{c@sb@#1}{\@ldaddtoctr{#1}{#2}}{\ifnum
  323.   \@nameuse{c@sb@#1}<0\relax
  324.   \@ldaddtoctr{#1}{#2}\else \@ldaddtoctr{sb@#1}{#2}\fi}%
  325. \let\@ldendeqnarray=\endeqnarray
  326. \def\endeqnarray{\@ldendeqnarray
  327.   \@ifundefined{c@sb@equation}{}{\ifnum\c@sb@equation<0\else
  328.   \@ldaddtoctr{equation}{1}\@ldaddtoctr{sb@equation}{-1}\fi}}
  329. %%======================APPENDIX.DTX========================================
  330. \def\filename{appendix}
  331. \def\fileversion{2.0}
  332. \def\filedate{1994/05/17}
  333. %% Copyright (C) 1994 Patrick W. Daly
  334. \@ifundefined{iffigcaps}{}{\@@warning
  335.   {^^J ********************************^^J
  336.        `\filename' read in after `figcaps'^^J
  337.        There could be problems with figure,^^J
  338.        table numbering in appendices^^J
  339.        ********************************}}
  340. \@ifundefined{appendixname}{\def\appendixname{Appendix}}{}
  341. \let\orisection=\section
  342. \let\theolds=\thesection
  343. \let\theoldss=\thesubsection
  344. \let\orisubsection=\subsection
  345. \def\appendix{\par
  346.   \setcounter{section}{0}
  347.   \setcounter{subsection}{0}
  348.   \def\thesection{\Alph{section}}
  349.   \def\thesubsection{\thesection\arabic{subsection}}
  350.   \setcounter{secnumdepth}{3}
  351.   \@addtoreset{equation}{section}
  352.   \setcounter{equation}{0}
  353.   \def\theequation{\thesection\arabic{equation}}
  354.   \@addtoreset{figure}{section}
  355.   \setcounter{figure}{0}
  356.   \def\thefigure{\thesection\arabic{figure}}
  357.   \@addtoreset{table}{section}
  358.   \def\thetable{\thesection\arabic{table}}
  359.   \setcounter{table}{0}
  360.   \@ifundefined{c@plate}{\newcounter{plate}}{}
  361.   \@addtoreset{plate}{section}
  362.   \def\theplate{\thesection\arabic{plate}}
  363.   \setcounter{plate}{0}
  364.   \def\@Alph##1{\ifcase##1A\or A\or B\or C\or D\else\@Ialph{##1}\fi}
  365.  \def\section{\@sectiontrue\orisection}
  366.   \def\sectype{\if@section\appendixname~\fi}
  367.   \def\sectchar{\if@section:\else.\fi}
  368.   \def\ssectchar{\if@section\unskip:~\else\fi}
  369.    \def\subsection{\@sectionfalse\orisubsection}
  370. \newif\if@section \@sectionfalse
  371. \def\noappendix{\setcounter{secnumdepth}{0}
  372.   \global\let\section=\orisection
  373.   \global\let\thesection=\theolds
  374.   \global\let\thesubsection=\theoldss
  375.   \gdef\sectchar{.} \gdef\ssectchar{}
  376.   \gdef\sectype{}
  377.   \global\let\subsection=\orisubsection
  378. \@ifundefined{reset@font}{\let\reset@font=\relax}{}
  379. \@ifundefined{bfseries}{\let\bfseries=\bf}{}
  380. %%======================FIGCAPS.DTX========================================
  381. \def\filename{figcaps}
  382. \def\fileversion{4.3a}
  383. \def\filedate{1994/06/06}
  384. %% Copyright (C) 1994 Patrick W. Daly
  385. \newif\if@twoOnine \let\if@twoOnine=\if@compatibility
  386. \@ifundefined{documentclass}{
  387.     \@twoOninetrue
  388. \@ifundefined{chapter}{}{\@latexerr{`\filename' may only be used with
  389.   article-like classes}{There is no help. You just cannot use `\filename'}}
  390. \newif\iffigcaps \figcapstrue
  391. \newif\iffigmark \figmarkfalse
  392. \newif\if@figpage \@figpagefalse
  393. \@ifundefined{figurecapname}{\def\figurecapname{Figure Captions}}{}
  394. \@ifundefined{tablepagename}{\def\tablepagename{Tables}}{}
  395. \@ifundefined{figurepagename}{\def\figurepagename{Figures}}{}
  396. \begingroup
  397.   \catcode `|=0 \catcode `[= 1
  398.   \catcode`]=2 \catcode `\{=12 \catcode `\}=12
  399.   \catcode`\^^M=13 \catcode`\\=12 %
  400. |long|gdef|@vfig#1\end{figure}[|def|@term[\end{figure}]%
  401.           |expandafter|writelof#1^^M\end{figure}^^M|end[figure]]%
  402. |long|gdef|@vsfig#1\end{figure*}[|def|@term[\end{figure*}]%
  403.           |expandafter|writelof#1^^M\end{figure*}^^M|end[figure*]]%
  404. |long|gdef|@vtab#1\end{table}[|def|@term[\end{table}]%
  405.           |expandafter|writelot#1^^M\end{table}^^M|end[table]]%
  406. |long|gdef|@vstab#1\end{table*}[|def|@term[\end{table*}]%
  407.           |expandafter|writelot#1^^M\end{table*}^^M|end[table*]]%
  408. |long|gdef|@vpla#1\end{plate}[|def|@term[\end{plate}]%
  409.           |expandafter|writelof#1^^M\end{plate}^^M|end[plate]]%
  410. |long|gdef|@vspla#1\end{plate*}[|def|@term[\end{plate*}]%
  411.           |expandafter|writelof#1^^M\end{plate*}^^M|end[plate*]]%
  412. |long|gdef|@vptab#1\end{planotable}[|def|@term[\end{planotable}]%
  413.           |expandafter|writelot#1^^M\end{planotable}^^M|end[planotable]]%
  414.   |endgroup
  415. \def\lof{lof} \def\lot{lot}
  416. {\catcode`\^^M=13%
  417.   \long\gdef\writelof#1^^M{\def\@tempb{#1}%
  418.       \ifx\@tempb\@term\let\@tempa\relax\else
  419.       \if@filesw\@writefile{pof}{#1}\fi\let\@tempa\writelof\fi \@tempa}
  420.   \long\gdef\writelot#1^^M{\def\@tempb{#1}%
  421.       \ifx\@tempb\@term\let\@tempa\relax\else
  422.       \if@filesw\@writefile{pot}{#1}\fi\let\@tempa\writelot\fi \@tempa}
  423. \def\figcapson{\figcapstrue}
  424. \def\figcapsoff{\figcapsfalse}
  425. \def\figmarkon{\figmarktrue}
  426. \def\figmarkoff{\figmarkoff}
  427. \def\figure{\iffigcaps \let\@tempb=\@zfigure \else \let\@tempb=\@float\fi
  428.   \@tempb{figure}}
  429. \def\@zfigure#1{\begingroup\set@literal\@ifnextchar[{\@figure}{\@figure[]}}
  430. \def\@figure[#1]{\@ifundefined{tf@pof}{\newwrite\tf@pof
  431.      \if@filesw\immediate\openout\tf@pof\jobname.\lof\fi}{}%
  432.   \refstepcounter{figure}\iffigmark\marginpar{\fbox{\fnum@figure}}\fi
  433.   \def\@captype{figure}\if@filesw\@writefile{pof}{\string\begin{figure}}\fi
  434.   \@vfig}
  435. \def\endfigure{\iffigcaps
  436.     \endgroup\if@filesw\@writefile{pof}{\string\end{figure}}\fi\else
  437.     \end@float\fi}
  438. \@namedef{figure*}{\iffigcaps \let\@tempb=\@zsfigure \else
  439.   \let\@tempb=\@dblfloat\fi \@tempb{figure}}
  440. \def\@zsfigure#1{\begingroup\set@literal\@ifnextchar[{\@sfigure}{\@sfigure[]}}
  441. \def\@sfigure[#1]{\@ifundefined{tf@pof}{\newwrite\tf@pof
  442.      \if@filesw\immediate\openout\tf@pof\jobname.\lof\fi}{}%
  443.   \refstepcounter{figure}\iffigmark\marginpar{\fbox{\fnum@figure}}\fi
  444.   \def\@captype{figure}\if@filesw\@writefile{pof}{\string\begin{figure}}\fi
  445.   \@vsfig}
  446. \@namedef{endfigure*}{\iffigcaps\endfigure\else\end@dblfloat\fi}
  447. \@ifundefined{c@plate}{\newcounter{plate}}{}
  448. \def\plate{\iffigcaps \let\@tempb=\@zplate \else \let\@tempb=\@float\fi
  449.   \@tempb{plate}}
  450. \def\@zplate#1{\begingroup\set@literal\@ifnextchar[{\@plate}{\@plate[]}}
  451. \def\@plate[#1]{\@ifundefined{tf@pof}{\newwrite\tf@pof
  452.      \if@filesw\immediate\openout\tf@pof\jobname.\lof\fi}{}%
  453.   \refstepcounter{plate}\iffigmark\marginpar{\fbox{\fnum@plate}}\fi
  454.   \def\@captype{plate}\if@filesw\@writefile{pof}{\string\begin{plate}}\fi
  455.   \@vpla}
  456. \def\endplate{\iffigcaps
  457.     \endgroup\if@filesw\@writefile{pof}{\string\end{plate}}\fi\else
  458.     \end@float\fi}
  459. \@namedef{plate*}{\iffigcaps \let\@tempb=\@zsplate \else
  460.   \let\@tempb=\@dblfloat\fi \@tempb{plate}}
  461. \def\@zsplate#1{\begingroup\set@literal\@ifnextchar[{\@splate}{\@splate[]}}
  462. \def\@splate[#1]{\@ifundefined{tf@pof}{\newwrite\tf@pof
  463.      \if@filesw\immediate\openout\tf@pof\jobname.\lof\fi}{}%
  464.   \refstepcounter{plate}\iffigmark\marginpar{\fbox{\fnum@plate}}\fi
  465.   \def\@captype{plate}\if@filesw\@writefile{pof}{\string\begin{plate}}\fi
  466.   \@vspla}
  467. \@namedef{endplate*}{\iffigcaps\endplate\else\end@dblfloat\fi}
  468. \def\table{\iffigcaps \let\@tempb=\@ztable \else \let\@tempb=\@float\fi
  469.   \@tempb{table}}
  470. \def\@ztable#1{\begingroup\set@literal\@ifnextchar[{\@table}{\@table[]}}
  471. \def\@table[#1]{\@ifundefined{tf@pot}{\newwrite\tf@pot
  472.      \if@filesw\immediate\openout\tf@pot\jobname.\lot\fi}{}%
  473.   \refstepcounter{table}\iffigmark\marginpar{\fbox{\fnum@table}}\fi
  474.   \def\@captype{table}\if@filesw\@writefile{pot}{\string\begin{table}}\fi
  475.   \@vtab}
  476. \def\endtable{\iffigcaps
  477.    \endgroup\if@filesw\@writefile{pot}{\string\end{table}}\fi\else
  478.    \end@float\fi}
  479. \@namedef{table*}{\iffigcaps \let\@tempb=\@zstable \else
  480.   \let\@tempb=\@dblfloat\fi \@tempb{table}}
  481. \def\@zstable#1{\begingroup\set@literal\@ifnextchar[{\@stable}{\@stable[]}}
  482. \def\@stable[#1]{\@ifundefined{tf@pot}{\newwrite\tf@pot
  483.      \if@filesw\immediate\openout\tf@pot\jobname.\lot\fi}{}%
  484.   \refstepcounter{table}\iffigmark\marginpar{\fbox{\fnum@table}}\fi
  485.   \def\@captype{table}\if@filesw\@writefile{pot}
  486.     {\string\begin{table}}%
  487.     \fi\@vstab}
  488. \@namedef{endtable*}{\iffigcaps\endtable\else\end@dblfloat\fi}
  489. \let\aguplano=\planotable
  490. \let\endaguplano=\endplanotable
  491. \def\planotable{\iffigcaps \let\@tempb=\@ptable \else
  492.   \let\@tempb=\aguplano\fi \@tempb}
  493. \def\@ptable{\begingroup\set@literal
  494.      \@ifundefined{tf@pot}{\newwrite\tf@pot
  495.      \if@filesw\immediate\openout\tf@pot\jobname.\lot\fi}{}%
  496.   \refstepcounter{table}\iffigmark\marginpar{\fbox{\fnum@table}}\fi
  497.   \def\@captype{table}\if@filesw\@writefile{pot}
  498.      {\string\begin{planotable}}\fi \@vptab}
  499. \def\endplanotable{\iffigcaps
  500.    \endgroup\if@filesw\@writefile{pot}{\string\end{planotable}}\fi\else
  501.    \endaguplano\fi}
  502. \def\tableofcontents{\@@warning{Ignored:
  503.        \string\tableofcontents\space command}}
  504. \def\listoffigures{\@@warning{Ignored:
  505.        \string\listoffigures\space command}}
  506. \def\listoftables{\@@warning{Ignored:
  507.        \string\listoftables\space command}}
  508. \def\listofplates{\@@warning{Ignored:
  509.        \string\listofplates\space command}}
  510. \def\addtocontents#1#2{\relax}
  511. \def\addcontentsline#1#2#3{\relax}
  512. {\catcode`\^^M=\active \gdef\cr@relax{\catcode`\^^M=\active \let^^M=\relax}}
  513. \def\set@literal{\cr@relax \let\do\@makeother\dospecials}
  514. \def\@figurecaps{\@ifundefined{tf@pof}{}{\if@filesw
  515.   \immediate\closeout\tf@pof\fi
  516.   \@ifundefined{appendixname}{}{\def\appendixname{}}
  517.   \noappendix \parindent\z@
  518.   \reset@figtab\clearpage\section*{\figurecapname}\vspace{1cm}%
  519.     \@mkboth{\uppercase{\figurecapname}}{\uppercase{\figurecapname}}%
  520.     \addcontentsline{toc}{section}{\figurecapname}%
  521.   \def\figure{\def\addcontentsline####1####2####3{}%
  522.     \def\@captype{figure}%
  523.     \vbox\bgroup
  524.    }\def\endfigure{\egroup\bigskip}%
  525.   \def\plate{\def\addcontentsline####1####2####3{}%
  526.     \def\@captype{plate}%
  527.     \vbox\bgroup
  528.    }\let\endplate=\endfigure
  529.   {\let\@makecaption=\@makefcaption
  530.   \def\figbox##1##2##3{\relax}
  531.   \@input{\jobname.\lof}}%
  532.   \clearpage}}%
  533. \def\@tablepage{\@ifundefined{tf@pot}{}{\if@filesw
  534.   \immediate\closeout\tf@pot\fi
  535.   \@ifundefined{appendixname}{}{\def\appendixname{}}
  536.   \noappendix \parindent\z@
  537.   \reset@figtab\clearpage\section*{\tablepagename}
  538.     \@mkboth{\uppercase{\tablepagename}}{\uppercase{\tablepagename}}%
  539.    \def\table{\def\@captype{table}\vbox\bgroup
  540.    }\def\endtable{\spew@tblnotes\egroup\bigskip}%
  541.    \let\planotable=\aguplano \let\endplanotable=\endaguplano
  542.    \def\@float##1{\def\@captype{table}\vbox\bgroup}
  543.    \let\@dblfloat=\@float \let\clearpage=\newpage
  544.   \@input{\jobname.\lot}
  545.   \clearpage}}
  546. \def\printfigures{\@figpagetrue}
  547. \def\@figurepage{\if@figpage\@ifundefined{tf@pof}{}{%
  548.   \@ifundefined{appendixname}{}{\def\appendixname{}}
  549.   \noappendix \parindent\z@
  550.   \reset@figtab\clearpage\section*{\figurepagename}%
  551.   \@mkboth{\uppercase{\figurepagename}}{\uppercase{\figurepagename}}%
  552.   \begingroup
  553.   \def\figurewidth##1{\pt@width##1\hsize##1}
  554.   \def\figure{\def\@captype{figure}\vbox\bgroup}\def\endfigure{\egroup
  555.     \vspace{20pt}}%
  556.   \let\platewidth=\figurewidth
  557.   \def\plate{\def\@captype{plate}\vbox\bgroup}\let\endplate=\endfigure
  558.   \def\label##1{}%
  559.   \@input{\jobname.\lof}\newpage\endgroup}\fi}
  560. \def\reset@figtab{%
  561.   \setcounter{figure}{0}\setcounter{table}{0}
  562.   \setcounter{plate}{0}
  563. \if@twoOnine
  564. \let\@nddoc=\enddocument
  565. \def\enddocument{\iffigcaps\@figurecaps\@tablepage\@figurepage\fi\@nddoc}
  566. \else
  567. \AtEndDocument{\iffigcaps\@figurecaps\@tablepage\@figurepage\fi}
  568. \let\@appendix=\appendix
  569. \def\appendix{%
  570.   \@ifundefined{tf@pof}{}{\if@filesw\@writefile{pof}{\string\doappendix}\fi}%
  571.   \@ifundefined{tf@pot}{}{\if@filesw\@writefile{pot}{\string\doappendix}\fi}%
  572.   \let\@section=\section
  573.   \doappendix
  574.   \let\@@section=\section
  575.   \def\section{%
  576.     \@ifundefined{tf@pof}{}{\if@filesw\@writefile{pof}{\string
  577.         \stepcounter{section}}\fi}%
  578.     \@ifundefined{tf@pot}{}{\if@filesw\@writefile{pot}{\string
  579.         \stepcounter{section}}\fi}%
  580.     \@@section}
  581.   \let\reset@figtab=\@unappendix}
  582. \def\doappendix{%
  583.   \let\@thefigure=\thefigure
  584.   \let\@thetable=\thetable
  585.   \let\@theplate=\theplate
  586.   \let\@cl@section=\cl@section
  587.   \@appendix
  588. \def\@unappendix{%
  589.   \setcounter{figure}{0}\setcounter{table}{0}
  590.   \let\thefigure=\@thefigure
  591.   \let\thetable=\@thetable
  592.   \setcounter{plate}{0}%
  593.   \let\theplate=\@theplate
  594.   \let\cl@section=\@cl@section
  595.   \let\section=\@section
  596. \let\orisubon=\sublabon
  597. \let\orisuboff=\sublaboff
  598. \def\sublabon#1{\orisubon{#1}\if@filesw
  599.     \iffigcaps\def\@tempb{#1}
  600.     \def\@tempa{figure}\ifx\@tempa\@tempb
  601.     \@ifundefined{tf@pof}{\newwrite\tf@pof
  602.         \immediate\openout\tf@pof\jobname.\lof}{}%
  603.     \@writefile{pof}{\string\orisubon{#1}}\fi
  604.     \def\@tempa{plate}\ifx\@tempa\@tempb
  605.     \@ifundefined{tf@pof}{\newwrite\tf@pof
  606.         \immediate\openout\tf@pof\jobname.\lof}{}%
  607.     \@writefile{pof}{\string\orisubon{#1}}\fi
  608.     \def\@tempa{table}\ifx\@tempa\@tempb
  609.     \@ifundefined{tf@pot}{\newwrite\tf@pot
  610.         \immediate\openout\tf@pot\jobname.\lot}{}%
  611.     \@writefile{pot}{\string\orisubon{#1}}\fi
  612. \fi\fi}
  613. \def\sublaboff#1{\orisuboff{#1}\if@filesw
  614.     \iffigcaps\def\@tempb{#1}
  615.     \def\@tempa{figure}\ifx\@tempa\@tempb
  616.     \@ifundefined{tf@pof}{\newwrite\tf@pof
  617.         \immediate\openout\tf@pof\jobname.\lof}{}%
  618.     \@writefile{pof}{\string\orisuboff{#1}}\fi
  619.     \def\@tempa{plate}\ifx\@tempa\@tempb
  620.     \@ifundefined{tf@pof}{\newwrite\tf@pof
  621.         \immediate\openout\tf@pof\jobname.\lof}{}%
  622.     \@writefile{pof}{\string\orisuboff{#1}}\fi
  623.     \def\@tempa{table}\ifx\@tempa\@tempb
  624.     \@ifundefined{tf@pot}{\newwrite\tf@pot
  625.         \immediate\openout\tf@pot\jobname.\lot}{}%
  626.     \@writefile{pot}{\string\orisuboff{#1}}\fi
  627. \fi\fi}
  628. \def\figbox#1#2#3{\hbox to \hsize{\hfil
  629.   \framebox[#1][c]{\@tempdima#2 \divide\@tempdima by2\relax
  630.   \advance\@tempdima by-\fboxsep \advance\@tempdima by-\fboxrule
  631.   \vrule\@height\@tempdima\@depth\@tempdima\@width\z@
  632.   \vbox to \z@{\vss\hbox{#3}\vss}}\hfil}}
  633. \figmarktrue
  634. \if@preprint \figcapsfalse
  635.   \def\figurewidth#1{\pt@width=\hsize}
  636.   \def\platewidth#1{\pt@width=\hsize}
  637. \if@draft
  638.   \def\figurewidth#1{\pt@width=\hsize}
  639.   \def\platewidth#1{\pt@width=\hsize}
  640. \let\ori@makecap=\@makecaption
  641. \def\@makefcaption#1#2{{\if@dblcap\if@camera\pt@width=\textwidth
  642.  \ori@makecap{#1}{#2}
  643.  \pt@width=\wpt@width
  644.  \hsize=\pt@width
  645.  \vskip10pt \def\label##1{}\fi\fi
  646.  \ori@makecap{#1}{#2}}
  647. \newdimen\wpt@width
  648. \newif\if@dblcap \@dblcapfalse
  649. \def\doublecaption#1{\wpt@width=#1\relax\@dblcaptrue}
  650. %%======================NATBIB.DTX========================================
  651. \def\filename{natbib}
  652. \def\fileversion{5.0}
  653. \def\filedate{1994/05/18}
  654. %% Copyright (C) 1994 Patrick W. Daly
  655. \newif\if@twoOnine \let\if@twoOnine=\if@compatibility
  656. \@ifundefined{documentclass}{
  657.     \@twoOninetrue
  658. \def\bibstyle@agu{\bibpunct{[}{]}{;}{a}{,}{,}}
  659. \def\@cite#1#2#3{\if@tempswa\@citebegin\if#2\@empty\else#2 \fi
  660.         #1\if#3\@empty\else, #3\fi\@citeend\else#1\fi}
  661. \def\@citex[#1][#2]#3{\if@filesw\immediate\write
  662.      \@auxout{\string\citation{#3}}\fi
  663.   \let\@citea\@empty
  664.   \@cite{\let\@citenm\@empty
  665.     \@for\@citeb:=#3\do
  666.     {\def\@tempa##1##2\@nil{\edef\@citeb{\if##1\space##2\else##1##2\fi}}%
  667.      \expandafter\@tempa\@citeb\@nil
  668.      \@ifundefined{b@\@citeb}{\@citea{\reset@font\bfseries ?}\@warning
  669.        {Citation `\@citeb' on page \thepage \space undefined}}%
  670.      {\let\@citemm=\@citenm
  671.      \@cite@parse{\@citeb}%
  672.      \if@tempswa
  673.        \ifx\@citemm\@citenm\@yrsep\else\@citea{\@citenm}\@auyrsep\fi
  674.        \ \@citedt \def\@citea{\@citesep\ }%
  675.      \else
  676.        \ifx\@citemm\@citenm, \@citedt\else\@citea{\@citenm}
  677.            \@citebegin\@citedt\fi
  678.        \def\@citea{\@citeend\@citesep\ }%
  679.      \fi}}\if@tempswa\else\@citeend\fi}{#1}{#2}}
  680. \def\@biblabel#1{\hfill}
  681. \def\bibpunct#1#2#3#4#5#6{\gdef\@citebegin{#1}\gdef\@citeend{#2}\gdef
  682.    \@citesep{#3}\ifx #4n\global\let\@bibsetup=\@bibsetnum
  683.    \global\let\@citex=\@citexnum
  684.    \global\let\@biblabel=\@biblabelnum
  685.    \global\let\@cite=\@citenum\fi
  686.    \gdef\@auyrsep{#5}\gdef\@yrsep{#6}}
  687. \bibstyle@agu
  688. \def\cite{\@ifnextchar [{\@tempswatrue\@citex@}{\@tempswafalse
  689.     \@citex@[]}}
  690. \def\@citex@[#1]{\@ifnextchar [{\@citex[#1]}{\@citex[][#1]}}
  691. \def\citeauthor#1{\ifx\@citex\@citexnum{\reset@font\bfseries(author?)}\@warning
  692.        {Cannot use \string\citeauthor\space with numerical citations}\else
  693.      \@ifundefined{b@#1}{{\reset@font\bfseries ?}\@warning
  694.        {Citation `#1' on page \thepage \space undefined}}%
  695.        {\@cite@parse{#1}\@citenm}\fi}
  696. \def\citeyear#1{\ifx\@citex\@citexnum{\reset@font\bfseries(year?)}\@warning
  697.        {Cannot use \string\citeyear\space with numerical citations}\else
  698.      \@ifundefined{b@#1}{{\reset@font\bfseries ?}\@warning
  699.        {Citation `#1' on page \thepage \space undefined}}%
  700.        {\@cite@parse{#1}\@citedt}\fi}
  701. \def\@cite@parse#1{{%
  702.        \@ifundefined{documentclass}
  703.         {\let\prm=\relax\let\psf=\relax\let\ptt=\relax\let\pbf=\relax
  704.         \let\psl=\relax\let\psc=\relax\let\pit=\relax\let\pem=\relax
  705.         \let\prmfamily=\relax\let\psffamily=\relax\let\pttfamily=\relax
  706.         \let\pbfseries=\relax\let\pslshape=\relax\let\pscshape=\relax
  707.         \let\pitshape=\relax\let\pmdseries=\relax\let\pupshape=\relax
  708.         \let\pc=\relax \let\pd=\relax \let\pb=\relax}
  709. % The manual patch to allow this to run under true LaTeX2e
  710.         {\let\protect\noexpand}%
  711.      \xdef\@tempa{\csname b@#1\endcsname\relax}}%
  712.      \expandafter\@citez\@tempa()\@nil}
  713. \def\@citez#1(#2)#3\@nil{\gdef\@citenm{#1}\gdef\@citedt{#2}%
  714. \let\aguthebib=\thebibliography
  715. \def\thebibliography#1{\noappendix\aguthebib{#1}}
  716. \@ifundefined{reset@font}{\let\reset@font=\relax}{}
  717. \@ifundefined{bfseries}{\let\bfseries=\bf}{}
  718. %%======================BALANCE.DTX========================================
  719. \def\filename{balance}
  720. \def\fileversion{4.1}
  721. \def\filedate{1994/05/16}
  722. %% Copyright (C) 1994 Patrick W. Daly
  723. \def\@BAlancecol{\if@twocolumn
  724.   \setbox0=\vbox{\unvbox\@outputbox} \@tempdima=\ht0
  725.   \advance\@tempdima by \topskip \advance\@tempdima
  726.      by -\baselineskip \divide\@tempdima by 2
  727.      \splittopskip=\topskip
  728.   {\vbadness=\@M \loop \global\setbox3=\copy0
  729.    \global\setbox1=\vsplit3 to \@tempdima
  730.    \ifdim\ht3>\@tempdima \global\advance\@tempdima by 1pt \repeat}
  731.    \setbox\@leftcolumn=\vbox to \@tempdima{\unvbox1\vfil}
  732.    \setbox\@outputbox=\vbox to \@tempdima
  733.      {\dimen2=\dp3\unvbox3\kern-\dimen2
  734.       \vfil}
  735.   \fi}
  736. \newif\if@BAlanceone
  737. \global\@BAlanceonefalse
  738. \newdimen\oldvsize
  739. \def\@BAdblcol{\if@firstcolumn
  740.        \unvbox\@outputbox \penalty\outputpenalty
  741.        \global\oldvsize=\@colht \global\multiply \@colht by 2
  742.        \global\@BAlanceonetrue
  743.        \global\@firstcolumnfalse
  744.   \else \global\@firstcolumntrue
  745.        \if@BAlanceone
  746.        \global\@BAlanceonefalse\@BAlancecol
  747.        \global\@colht=\oldvsize \else
  748.        \@@warning{You have called \string\balance\space
  749.                   in second column^^J
  750.                   Columns may not be balanced}\fi
  751.      \setbox\@outputbox\vbox to \@colht{\hbox to\textwidth
  752.      {\hbox to\columnwidth {\box\@leftcolumn \hss}\hfil
  753.       \vrule width\columnseprule\hfil \hbox to\columnwidth
  754.       {\box\@outputbox \hss}}\vfil}\@combinedblfloats
  755.      \@outputpage \begingroup \@dblfloatplacement
  756.      \@startdblcolumn \@whilesw\if@fcolmade \fi
  757.      {\@outputpage\@startdblcolumn}\endgroup
  758.   \fi}
  759. \let\@@utputdblcol=\@outputdblcol
  760. \def\balance{\global\let\@outputdblcol=\@BAdblcol}
  761. \def\nobalance{\global\let\@outputdblcol=\@@utputdblcol}
  762. %% <<<<< End of decommented file <<<<<< 
  763. %% End of file aguplus.sty. 
  764.